home *** CD-ROM | disk | FTP | other *** search
/ The Netherlands - A Compact World / The Netherlands.iso / NederlandMX.dxr / Heinz' tekeningen_63_voor H3.ls < prev    next >
Encoding:
Text File  |  2004-06-24  |  681 b   |  32 lines
  1. on H3down
  2.   global naam, daargaanwe, wegaannaar
  3.   if naam = EMPTY then
  4.     naam = "#"
  5.     set the member of sprite 13 to "H3-down"
  6.     set the locH of sprite 13 to 618
  7.     set the locV of sprite 13 to 315
  8.     daargaanwe = 1
  9.     wegaannaar = "3.dir"
  10.   end if
  11. end
  12.  
  13. on H3enter
  14.   global naam
  15.   if naam = EMPTY then
  16.     cursor(280)
  17.     sprite(171).visibility = 1
  18.     set the member of sprite 13 to "H3-enter"
  19.     set the locH of sprite 13 to 624
  20.     set the locV of sprite 13 to 109
  21.   end if
  22. end
  23.  
  24. on H3leave
  25.   cursor(-1)
  26.   sprite(171).visibility = 0
  27.   set the member of sprite 13 to "H3-leave"
  28.   set the locH of sprite 13 to 624
  29.   set the locV of sprite 13 to 110
  30.   sound(1).stop()
  31. end
  32.